home *** CD-ROM | disk | FTP | other *** search
/ Resource Library: Multimedia / Resource Library: Multimedia.iso / maestro / source / timeline / editinfo.g < prev    next >
Encoding:
Text File  |  1993-06-15  |  14.1 KB  |  508 lines
  1. ;GIL-3
  2. (
  3. (
  4.     :type                   :popup-window
  5.     :name                   EditInfoWindow
  6.     :owner                  nil
  7.     :width                  509
  8.     :height                 313
  9.     :background-color       "Gray"
  10.     :foreground-color       "Black"
  11.     :label                  "Edit Information Window"
  12.     :label-type             :string
  13.     :initial-state          :invisible
  14.     :show-footer            t
  15.     :resizable              nil
  16.     :pinned                 nil
  17.     :done-handler           nil
  18.     :event-handler          nil
  19.     :user-data              ()
  20.     :actions                ()
  21. )
  22. (
  23.     :type                   :control-area
  24.     :name                   TopPanel
  25.     :owner                  EditInfoWindow
  26.     :help                   ""
  27.     :x                      0
  28.     :y                      0
  29.     :width                  509
  30.     :height                 80
  31.     :background-color       "Light Gray"
  32.     :foreground-color       ""
  33.     :initial-state          :visible
  34.     :show-border            nil
  35.     :menu                   nil
  36.     :event-handler          nil
  37.     :user-data              ()
  38.     :actions                ()
  39. )
  40. (
  41.     :type                   :message
  42.     :name                   TimeLineMessage
  43.     :owner                  TopPanel
  44.     :help                   ""
  45.     :x                      24
  46.     :y                      8
  47.     :width                  136
  48.     :height                 13
  49.     :foreground-color       "Black"
  50.     :label                  "TimeLine Editor     : "
  51.     :label-type             :string
  52.     :label-bold             t
  53.     :initial-state          :active
  54.     :event-handler          nil
  55.     :user-data              ()
  56.     :actions                ()
  57. )
  58. (
  59.     :type                   :message
  60.     :name                   TimeLineDocMsg
  61.     :owner                  TopPanel
  62.     :help                   ""
  63.     :x                      164
  64.     :y                      8
  65.     :width                  61
  66.     :height                 13
  67.     :foreground-color       "Black"
  68.     :label                  "docname"
  69.     :label-type             :string
  70.     :label-bold             t
  71.     :initial-state          :active
  72.     :event-handler          nil
  73.     :user-data              ()
  74.     :actions                ()
  75. )
  76. (
  77.     :type                   :message
  78.     :name                   NumNotesMessage
  79.     :owner                  TopPanel
  80.     :help                   ""
  81.     :x                      300
  82.     :y                      8
  83.     :width                  135
  84.     :height                 13
  85.     :foreground-color       "Black"
  86.     :label                  "# of notes               : "
  87.     :label-type             :string
  88.     :label-bold             t
  89.     :initial-state          :active
  90.     :event-handler          nil
  91.     :user-data              ()
  92.     :actions                ()
  93. )
  94. (
  95.     :type                   :message
  96.     :name                   NotesCountMessage
  97.     :owner                  TopPanel
  98.     :help                   ""
  99.     :x                      440
  100.     :y                      8
  101.     :width                  8
  102.     :height                 13
  103.     :foreground-color       "Black"
  104.     :label                  "0"
  105.     :label-type             :string
  106.     :label-bold             t
  107.     :initial-state          :active
  108.     :event-handler          nil
  109.     :user-data              ()
  110.     :actions                ()
  111. )
  112. (
  113.     :type                   :message
  114.     :name                   AppNameLabel
  115.     :owner                  TopPanel
  116.     :help                   ""
  117.     :x                      24
  118.     :y                      28
  119.     :width                  136
  120.     :height                 13
  121.     :foreground-color       "Black"
  122.     :label                  "Application name  : "
  123.     :label-type             :string
  124.     :label-bold             t
  125.     :initial-state          :active
  126.     :event-handler          nil
  127.     :user-data              ()
  128.     :actions                ()
  129. )
  130. (
  131.     :type                   :message
  132.     :name                   AppNameText
  133.     :owner                  TopPanel
  134.     :help                   ""
  135.     :x                      164
  136.     :y                      28
  137.     :width                  64
  138.     :height                 13
  139.     :foreground-color       "Black"
  140.     :label                  "appname"
  141.     :label-type             :string
  142.     :label-bold             t
  143.     :initial-state          :active
  144.     :event-handler          nil
  145.     :user-data              ()
  146.     :actions                ()
  147. )
  148. (
  149.     :type                   :message
  150.     :name                   SelectedNoteLabel
  151.     :owner                  TopPanel
  152.     :help                   ""
  153.     :x                      300
  154.     :y                      28
  155.     :width                  130
  156.     :height                 13
  157.     :foreground-color       "Black"
  158.     :label                  "Selected note         :"
  159.     :label-type             :string
  160.     :label-bold             t
  161.     :initial-state          :active
  162.     :event-handler          nil
  163.     :user-data              ()
  164.     :actions                ()
  165. )
  166. (
  167.     :type                   :message
  168.     :name                   SelectedNoteValue
  169.     :owner                  TopPanel
  170.     :help                   ""
  171.     :x                      440
  172.     :y                      28
  173.     :width                  34
  174.     :height                 13
  175.     :foreground-color       "Black"
  176.     :label                  "none"
  177.     :label-type             :string
  178.     :label-bold             t
  179.     :initial-state          :active
  180.     :event-handler          nil
  181.     :user-data              ()
  182.     :actions                ()
  183. )
  184. (
  185.     :type                   :message
  186.     :name                   HostnameLabel
  187.     :owner                  TopPanel
  188.     :help                   ""
  189.     :x                      24
  190.     :y                      48
  191.     :width                  136
  192.     :height                 13
  193.     :foreground-color       "Black"
  194.     :label                  "Hostname               : "
  195.     :label-type             :string
  196.     :label-bold             t
  197.     :initial-state          :active
  198.     :event-handler          nil
  199.     :user-data              ()
  200.     :actions                ()
  201. )
  202. (
  203.     :type                   :message
  204.     :name                   HostnameText
  205.     :owner                  TopPanel
  206.     :help                   ""
  207.     :x                      164
  208.     :y                      48
  209.     :width                  68
  210.     :height                 13
  211.     :foreground-color       "Black"
  212.     :label                  "hostname"
  213.     :label-type             :string
  214.     :label-bold             t
  215.     :initial-state          :active
  216.     :event-handler          nil
  217.     :user-data              ()
  218.     :actions                ()
  219. )
  220. (
  221.     :type                   :message
  222.     :name                   NotesInfoMessage1
  223.     :owner                  TopPanel
  224.     :help                   ""
  225.     :x                      28
  226.     :y                      64
  227.     :width                  244
  228.     :height                 13
  229.     :foreground-color       "Black"
  230.     :label                  "  Note #                       Label                  "
  231.     :label-type             :string
  232.     :label-bold             nil
  233.     :initial-state          :active
  234.     :event-handler          nil
  235.     :user-data              ()
  236.     :actions                ()
  237. )
  238. (
  239.     :type                   :message
  240.     :name                   NotesInfoMessage2
  241.     :owner                  TopPanel
  242.     :help                   ""
  243.     :x                      288
  244.     :y                      64
  245.     :width                  181
  246.     :height                 13
  247.     :foreground-color       "Black"
  248.     :label                  "Start           End        Duration"
  249.     :label-type             :string
  250.     :label-bold             nil
  251.     :initial-state          :active
  252.     :event-handler          nil
  253.     :user-data              ()
  254.     :actions                ()
  255. )
  256. (
  257.     :type                   :control-area
  258.     :name                   MiddlePanel
  259.     :owner                  EditInfoWindow
  260.     :help                   ""
  261.     :x                      0
  262.     :y                      80
  263.     :width                  509
  264.     :height                 160
  265.     :background-color       "Light Gray"
  266.     :foreground-color       ""
  267.     :initial-state          :visible
  268.     :show-border            nil
  269.     :menu                   nil
  270.     :event-handler          nil
  271.     :user-data              ()
  272.     :actions                ()
  273. )
  274. (
  275.     :type                   :scrolling-list
  276.     :name                   NoteInfoList
  277.     :owner                  MiddlePanel
  278.     :help                   ""
  279.     :x                      12
  280.     :y                      4
  281.     :width                  465
  282.     :height                 146
  283.     :value-x                12
  284.     :value-y                4
  285.     :rows                   7
  286.     :foreground-color       "Black"
  287.     :label                  ""
  288.     :title                  ""
  289.     :label-type             :string
  290.     :layout-type            :horizontal
  291.     :read-only              t
  292.     :multiple-selections    nil
  293.     :selection-required     nil
  294.     :initial-state          :active
  295.     :droppable              nil
  296.     :default-drop-site      nil
  297.     :menu                   nil
  298.     :notify-handler         NotesInfoListNotify
  299.     :event-handler          nil
  300.     :initial-list-values    ()
  301.     :initial-list-glyphs    ()
  302.     :initial-selections     ()
  303.     :user-data              ()
  304.     :actions                (
  305.         (
  306.         :from                   (EditInfoWindow NoteInfoList)
  307.         :when                   (Notify )
  308.         :to                     (EditInfoWindow NoteInfoList)
  309.         :function_type          CallFunction
  310.         :arg_type               ()
  311.         :action                 (NotesInfoListNotify)
  312.         )
  313.     )
  314. )
  315. (
  316.     :type                   :control-area
  317.     :name                   BottomPanel
  318.     :owner                  EditInfoWindow
  319.     :help                   ""
  320.     :x                      0
  321.     :y                      240
  322.     :width                  509
  323.     :height                 73
  324.     :background-color       "Light Gray"
  325.     :foreground-color       ""
  326.     :initial-state          :visible
  327.     :show-border            nil
  328.     :menu                   nil
  329.     :event-handler          nil
  330.     :user-data              ()
  331.     :actions                ()
  332. )
  333. (
  334.     :type                   :message
  335.     :name                   DocNameMessage
  336.     :owner                  BottomPanel
  337.     :help                   ""
  338.     :x                      20
  339.     :y                      8
  340.     :width                  119
  341.     :height                 13
  342.     :foreground-color       "Black"
  343.     :label                  "Document Name :"
  344.     :label-type             :string
  345.     :label-bold             t
  346.     :initial-state          :active
  347.     :event-handler          nil
  348.     :user-data              ()
  349.     :actions                ()
  350. )
  351. (
  352.     :type                   :setting
  353.     :name                   MuteChoice
  354.     :owner                  BottomPanel
  355.     :help                   ""
  356.     :x                      380
  357.     :y                      16
  358.     :width                  70
  359.     :height                 40
  360.     :value-x                380
  361.     :value-y                33
  362.     :rows                   1
  363.     :columns                0
  364.     :layout-type            :vertical
  365.     :foreground-color       "Black"
  366.     :setting-type           :exclusive
  367.     :selection-required     t
  368.     :label                  "Mute :"
  369.     :label-type             :string
  370.     :notify-handler         InstrumentMuteChoice
  371.     :event-handler          nil
  372.     :choices                ("Off" "On" )
  373.     :choice-label-types     (:string :string )
  374.     :choice-colors          ("Black" "Black" )
  375.     :initial-selections     (nil nil )
  376.     :initial-state          :active
  377.     :user-data              ()
  378.     :actions                (
  379.         (
  380.         :from                   (EditInfoWindow MuteChoice)
  381.         :when                   (Notify )
  382.         :to                     (EditInfoWindow MuteChoice)
  383.         :function_type          CallFunction
  384.         :arg_type               ()
  385.         :action                 (InstrumentMuteChoice)
  386.         )
  387.     )
  388. )
  389. (
  390.     :type                   :text-field
  391.     :name                   DocNameText
  392.     :owner                  BottomPanel
  393.     :help                   ""
  394.     :x                      8
  395.     :y                      28
  396.     :width                  320
  397.     :height                 15
  398.     :value-x                8
  399.     :value-y                28
  400.     :value-length           40
  401.     :stored-length          256
  402.     :rows                   3
  403.     :foreground-color       "Black"
  404.     :text-type              :alphanumeric
  405.     :label                  ""
  406.     :label-type             :string
  407.     :layout-type            :horizontal
  408.     :value-underlined       t
  409.     :initial-value          ""
  410.     :initial-state          :active
  411.     :read-only              t
  412.     :notify-handler         nil
  413.     :event-handler          nil
  414.     :user-data              ()
  415.     :actions                ()
  416. )
  417. (
  418.     :type                   :message
  419.     :name                   SelectionMessage
  420.     :owner                  BottomPanel
  421.     :help                   ""
  422.     :x                      20
  423.     :y                      56
  424.     :width                  70
  425.     :height                 13
  426.     :foreground-color       "Black"
  427.     :label                  "Selection :"
  428.     :label-type             :string
  429.     :label-bold             t
  430.     :initial-state          :active
  431.     :event-handler          nil
  432.     :user-data              ()
  433.     :actions                ()
  434. )
  435. (
  436.     :type                   :message
  437.     :name                   SelectionStartMessage
  438.     :owner                  BottomPanel
  439.     :help                   ""
  440.     :x                      108
  441.     :y                      56
  442.     :width                  39
  443.     :height                 13
  444.     :foreground-color       "Black"
  445.     :label                  "start :"
  446.     :label-type             :string
  447.     :label-bold             t
  448.     :initial-state          :active
  449.     :event-handler          nil
  450.     :user-data              ()
  451.     :actions                ()
  452. )
  453. (
  454.     :type                   :message
  455.     :name                   SelectionStartValue
  456.     :owner                  BottomPanel
  457.     :help                   ""
  458.     :x                      160
  459.     :y                      56
  460.     :width                  0
  461.     :height                 0
  462.     :foreground-color       "Black"
  463.     :label                  ""
  464.     :label-type             :string
  465.     :label-bold             t
  466.     :initial-state          :active
  467.     :event-handler          nil
  468.     :user-data              ()
  469.     :actions                ()
  470. )
  471. (
  472.     :type                   :message
  473.     :name                   SelectionEndMessage
  474.     :owner                  BottomPanel
  475.     :help                   ""
  476.     :x                      212
  477.     :y                      56
  478.     :width                  36
  479.     :height                 13
  480.     :foreground-color       "Black"
  481.     :label                  "end : "
  482.     :label-type             :string
  483.     :label-bold             t
  484.     :initial-state          :active
  485.     :event-handler          nil
  486.     :user-data              ()
  487.     :actions                ()
  488. )
  489. (
  490.     :type                   :message
  491.     :name                   SelectionEndValue
  492.     :owner                  BottomPanel
  493.     :help                   ""
  494.     :x                      252
  495.     :y                      56
  496.     :width                  0
  497.     :height                 0
  498.     :foreground-color       "Black"
  499.     :label                  ""
  500.     :label-type             :string
  501.     :label-bold             t
  502.     :initial-state          :active
  503.     :event-handler          nil
  504.     :user-data              ()
  505.     :actions                ()
  506. )
  507. )
  508.